home *** CD-ROM | disk | FTP | other *** search
/ Hottest 5 / Hottest 5 (1995)(PDSoft)[!].iso / pdsoft / library / lha / tma.lha / TMA_Installer < prev    next >
Text File  |  1980-11-24  |  2KB  |  99 lines

  1. ;
  2. ;   My first ever CLI script, so bear with me if you will!
  3. ;   Started on 31/10/94, went okay until 1/10/94 then it all went wrong
  4. ;   error: assign failed return code 20 (or something?!)
  5. ;   so later that evening, I started from scratch and
  6. ;   20 mins later you can see the results below...
  7. ;   A craply written CLI script if I may say sooooooooo!!
  8. ;   by Matthew Wilsher       (c)opyright 1994
  9. ;   Revised on 6/11/94 at 11:26am
  10. ;
  11.  
  12. .key test/s,full/s
  13.  
  14. Echo "*Ec*N*E[1m                              TMA Installation*N"
  15. Echo "                             by Matthew Wilsher"
  16. Echo "*E[0m"
  17.  
  18. .bra [
  19. .ket ]
  20.  
  21. Lab destloop
  22.     Echo "Enter destination for TMA (or Abort to quit) :- " noline
  23.     Set >NIL: destin ?
  24.     Echo " "
  25.     IF "$destin" EQ "Abort"
  26.         Skip exit
  27.     ENDIF
  28.  
  29.     IF "${destin}" EQ "TMA:"
  30.         Echo "Error:  cannot install TMA to the TMA disk!*N"
  31.         Skip back destloop
  32.     ENDIF
  33.  
  34.     Assign destin: "${destin}"
  35.     Assign >NIL: exists destin:
  36.     IF WARN
  37.         Echo "Error: partition does not exist.*N"
  38.         Skip back destloop
  39.     ENDIF
  40.  
  41. ; not too bad so far, eh?
  42.  
  43. Lab destok
  44.  
  45.     Echo "Making directory 'TMA' in destination..."
  46.     IF EXISTS destin:TMA
  47.         Echo "Directory already exists..."
  48.         Skip staTMA
  49.     ELSE
  50.     Makedir destin:TMA
  51.     ENDIF
  52.  
  53. Lab staTMA
  54.     Copy TMA:Icons/TMA.info to destin:TMA.info
  55.     Echo "Copying main file to destination..."
  56.     Copy TMA:TMA to destin:TMA/
  57.     Copy TMA:TMA.info to destin:TMA/
  58.     Echo "Making directory 'New_Data' in TMA directory..."
  59.  
  60.     IF EXISTS destin:TMA/New_Data
  61.         Echo "New_Data directory already exists..."
  62.         Skip copynd
  63.     ELSE
  64.         Makedir destin:TMA/New_Data
  65.     ENDIF
  66.  
  67. Lab copynd
  68.     Echo "Now copying all data from TMA disk to 'New_Data' directory..*N"
  69.     Copy all TMA:New_Data/ to destin:TMA/New_Data QUIET
  70.  
  71.     Echo "All copying finished..."
  72.  
  73.     IF EXISTS s:TMA.source
  74.         Echo "Deleting current s:TMA.source..."
  75.         Delete s:TMA.source QUIET
  76.     ELSE
  77.         Echo "Now creating TMA.source file in 'S' directory...*N"
  78.         Echo "${destin}TMA/New_Data/" >>s:TMA.source
  79.         Skip endTMA
  80.     ENDIF
  81.  
  82.     Echo "Now creating TMA.source file in 'S' directory*N"
  83.     Echo "${destin}TMA/New_Data/" >>s:TMA.source
  84.     
  85. Lab endTMA
  86.     Echo "All finished, now reboot and run 'TMA'*N"
  87.     Wait 1
  88.     Endcli
  89.  
  90. Lab exit
  91.     Echo "Okay, exiting around now..."
  92.     Wait 1
  93.     Endcli
  94.  
  95. ;
  96. ; god I'm sick of all this crap!
  97. ; -Matthew Wilsher 1994
  98. ;
  99.